home *** CD-ROM | disk | FTP | other *** search
/ BMUG Revelations / BMUG Revelations.toast / Programming / Programming Languages / Harvest C / MPW Int & Lib / Interfaces / Script.h < prev    next >
Text File  |  1991-04-17  |  38KB  |  1,100 lines
  1. /************************************************************
  2.  
  3. Created: Tuesday, January 15, 1991 at 8:57 AM
  4.     Script.h
  5.     C Interface to the Macintosh Libraries
  6.  
  7.  
  8.         Copyright Apple Computer, Inc.    1986-1990
  9.         All rights reserved
  10.  
  11. ************************************************************/
  12.  
  13.  
  14. #ifndef __SCRIPT__
  15. #define __SCRIPT__
  16.  
  17. #ifndef __TYPES__
  18. #include <Types.h>
  19. #endif
  20.  
  21. #ifndef __OSUTILS__
  22. #include <OSUtils.h>
  23. #endif
  24.  
  25.  
  26. enum {
  27.  
  28.  
  29. /* Script System constants */
  30.     smSystemScript = -1,            /*designates system script.*/
  31.     smCurrentScript = -2,           /*designates current font script.*/
  32.  
  33.     smRoman = 0,                    /*Roman*/
  34.     smJapanese = 1,                 /*Japanese*/
  35.     smTradChinese = 2,              /*Traditional Chinese*/
  36.     smKorean = 3,                   /*Korean*/
  37.     smArabic = 4,                   /*Arabic*/
  38.     smHebrew = 5,                   /*Hebrew*/
  39.     smGreek = 6,                    /*Greek*/
  40.     smCyrillic = 7,                 /*Cyrillic*/
  41.     smRSymbol = 8,                  /*Right-left symbol*/
  42.     smDevanagari = 9,               /*Devanagari*/
  43.     smGurmukhi = 10,                /*Gurmukhi*/
  44.     smGujarati = 11,                /*Gujarati*/
  45.     smOriya = 12,                   /*Oriya*/
  46.     smBengali = 13,                 /*Bengali*/
  47.     smTamil = 14,                   /*Tamil*/
  48.     smTelugu = 15,                  /*Telugu*/
  49.     smKannada = 16,                 /*Kannada/Kanarese*/
  50.     smMalayalam = 17                /*Malayalam*/
  51. };
  52. enum {
  53.     smSinhalese = 18,               /*Sinhalese*/
  54.     smBurmese = 19,                 /*Burmese*/
  55.     smKhmer = 20,                   /*Khmer/Cambodian*/
  56.     smThai = 21,                    /*Thai*/
  57.     smLaotian = 22,                 /*Laotian*/
  58.     smGeorgian = 23,                /*Georgian*/
  59.     smArmenian = 24,                /*Armenian*/
  60.     smSimpChinese = 25,             /*Simplified Chinese*/
  61.     smTibetan = 26,                 /*Tibetan*/
  62.     smMongolian = 27,               /*Mongolian*/
  63.     smGeez = 28,                    /*Geez/Ethiopic*/
  64.     smEthiopic = 28,                /*Synonym for smGeez*/
  65.     smEastEurRoman = 29,            /*Synonym for smSlavic*/
  66.     smVietnamese = 30,              /*Vietnamese*/
  67.     smExtArabic = 31,               /*extended Arabic*/
  68.     smUninterp = 32,                /*uninterpreted symbols, e.g. palette symbols*/
  69.  
  70. /*Obsolete names for script systems (kept for backward compatibility)*/
  71.     smChinese = 2,                  /*(use smTradChinese or smSimpChinese)*/
  72.     smRussian = 7,                  /*(old name for smCyrillic)*/
  73.  
  74. /* smMaldivian = 25;                                 (no more smMaldivian!)*/
  75.     smAmharic = 28,                 /*(old name for smGeez)*/
  76.     smSlavic = 29                   /*(old name for smEastEurRoman)*/
  77. };
  78. enum {
  79.     smSindhi = 31,                  /*(old name for smExtArabic)*/
  80.  
  81. /* Calendar Codes */
  82.     calGregorian = 0,
  83.     calArabicCivil = 1,
  84.     calArabicLunar = 2,
  85.     calJapanese = 3,
  86.     calJewish = 4,
  87.     calCoptic = 5,
  88.     calPersian = 6,
  89.  
  90. /* Integer Format Codes */
  91.     intWestern = 0,
  92.     intArabic = 1,
  93.     intRoman = 2,
  94.     intJapanese = 3,
  95.     intEuropean = 4,
  96.     intOutputMask = 0x8000,
  97.  
  98. /* CharByte byte types */
  99.     smSingleByte = 0,
  100.     smFirstByte = -1,
  101.     smLastByte = 1,
  102.     smMiddleByte = 2,
  103.  
  104. /* CharType field masks */
  105.     smcTypeMask = 0x000F,
  106.     smcReserved = 0x00F0
  107. };
  108. enum {
  109.     smcClassMask = 0x0F00,
  110.     smcOrientationMask = 0x1000,    /*two-byte script glyph orientation*/
  111.     smcRightMask = 0x2000,
  112.     smcUpperMask = 0x4000,
  113.     smcDoubleMask = 0x8000,
  114.  
  115. /* Basic CharType character types */
  116.     smCharPunct = 0x0000,
  117.     smCharAscii = 0x0001,
  118.     smCharEuro = 0x0007,
  119.     smCharExtAscii = 0x0007,        /* More correct synonym for smCharEuro */
  120.  
  121. /* Additional CharType character types for script systems */
  122.     smCharKatakana = 0x0002,        /*Japanese Katakana*/
  123.     smCharHiragana = 0x0003,        /*Japanese Hiragana*/
  124.     smCharIdeographic = 0x0004,     /*Hanzi, Kanji, Hanja*/
  125.     smCharTwoByteGreek = 0x0005,    /*2-byte Greek in Far East systems*/
  126.     smCharTwoByteRussian = 0x0006,  /*2-byte Cyrillic in Far East systems*/
  127.     smCharBidirect = 0x0008,        /*Arabic/Hebrew*/
  128.     smCharHangul = 0x000C,          /*Korean Hangul*/
  129.     smCharJamo = 0x000D,            /*Korean Jamo*/
  130.  
  131. /* old names for above, for backward compatibility */
  132.     smCharFISKana = 0x0002,         /*Katakana*/
  133.     smCharFISGana = 0x0003,         /*Hiragana*/
  134.     smCharFISIdeo = 0x0004          /*Hanzi, Kanji, Hanja*/
  135. };
  136. enum {
  137.     smCharFISGreek = 0x0005,        /*2-byte Greek in Far East systems*/
  138.     smCharFISRussian = 0x0006,      /*2-byte Cyrillic in Far East systems*/
  139.  
  140. /* CharType classes for punctuation (smCharPunct) */
  141.     smPunctNormal = 0x0000,
  142.     smPunctNumber = 0x0100,
  143.     smPunctSymbol = 0x0200,
  144.     smPunctBlank = 0x0300,
  145.     smPunctRepeat = 0x0400,         /* FIS: wildcard */
  146.     smPunctGraphic = 0x0500,        /* FIS: line graphics */
  147.  
  148. /* CharType classes for FISKana, FISGana */
  149.     smKanaSmall = 0x0100,           /*small kana character*/
  150.     smKanaHardOK = 0x0200,          /*can have dakuten*/
  151.     smKanaSoftOK = 0x0300,          /*can have dakuten or han-dakuten*/
  152.  
  153. /* CharType Ideographics classes for two-byte systems */
  154.     smIdeographicLevel1 = 0x0000,   /*level 1 char*/
  155.     smIdeographicLevel2 = 0x0100,   /*level 2 char*/
  156.     smIdeographicUser = 0x0200,     /*user char*/
  157.  
  158. /* old names for above, for backward compatibility */
  159.     smFISClassLvl1 = 0x0000,        /*level 1 char*/
  160.     smFISClassLvl2 = 0x0100,        /*level 2 char*/
  161.     smFISClassUser = 0x0200,        /*user char*/
  162.  
  163. /* CharType Jamo classes for Korean systems */
  164.     smJamoJaeum = 0x0000,           /*simple consonant char*/
  165.     smJamoBogJaeum = 0x0100,        /*complex consonant char*/
  166.     smJamoMoeum = 0x0200            /*simple vowel char*/
  167. };
  168. enum {
  169.     smJamoBogMoeum = 0x0300,        /*complex vowel char*/
  170.  
  171. /* CharType FIS glyph orientation */
  172.     smCharHorizontal = 0x0000,      /* horizontal character form, or for both */
  173.     smCharVertical = 0x1000,        /* vertical character form */
  174.  
  175. /* CharType directions */
  176.     smCharLeft = 0x0000,
  177.     smCharRight = 0x2000,
  178.  
  179. /* CharType case modifers */
  180.     smCharLower = 0x0000,
  181.     smCharUpper = 0x4000,
  182.  
  183. /* CharType character size modifiers (1 or multiple bytes). */
  184.     smChar1byte = 0x0000,
  185.     smChar2byte = 0x8000,
  186.  
  187. /* Char2Pixel directions */
  188.     smLeftCaret = 0,                /*Place caret for left block*/
  189.     smRightCaret = -1,              /*Place caret for right block*/
  190.     smHilite = 1,                   /*Direction is TESysJust*/
  191.  
  192. /* Transliterate target types for Roman */
  193.     smTransAscii = 0,
  194.     smTransNative = 1,
  195.     smTransCase = 0xFE,
  196.     smTransSystem = 0xFF,           /*convert to system script*/
  197.  
  198. /* Transliterate target types for FIS */
  199.     smTransAscii1 = 2,              /*1-byte Roman*/
  200.     smTransAscii2 = 3,              /*2-byte Roman*/
  201.     smTransKana1 = 4,               /*1-byte Japanese Katakana*/
  202.     smTransKana2 = 5                /*2-byte Japanese Katakana*/
  203. };
  204. enum {
  205.     smTransGana2 = 7,               /*2-byte Japanese Hiragana (no 1-byte Hiragana)*/
  206.     smTransHangul2 = 8,             /*2-byte Korean Hangul*/
  207.     smTransJamo2 = 9,               /*2-byte Korean Jamo*/
  208.     smTransBopomofo2 = 10,          /*2-byte Chinese Bopomofo*/
  209.  
  210. /* Transliterate target modifiers */
  211.     smTransLower = 0x4000,
  212.     smTransUpper = 0x8000,
  213.  
  214. /* Transliterate source mask - general */
  215.     smMaskAll = 0xFFFFFFFF,         /*Convert all text*/
  216.  
  217. /* Transliterate source masks */
  218.     smMaskAscii = 0x00000001,       /*2^smTransAscii*/
  219.     smMaskNative = 0x00000002,      /*2^smTransNative*/
  220.  
  221. /* Transliterate source masks for FIS */
  222.     smMaskAscii1 = 0x00000004,      /*2^smTransAscii1*/
  223.     smMaskAscii2 = 0x00000008,      /*2^smTransAscii2*/
  224.     smMaskKana1 = 0x00000010,       /*2^smTransKana1*/
  225.     smMaskKana2 = 0x00000020,       /*2^smTransKana2*/
  226.     smMaskGana2 = 0x00000080,       /*2^smTransGana2*/
  227.     smMaskHangul2 = 0x00000100,     /*2^smTransHangul2*/
  228.     smMaskJamo2 = 0x00000200,       /*2^smTransJamo2*/
  229.     smMaskBopomofo2 = 0x00000400,   /*2^smTransBopomofo2*/
  230.  
  231. /* Result values from GetEnvirons, SetEnvirons, GetScript and SetScript calls. */
  232.     smNotInstalled = 0,             /*routine not available in script*/
  233.     smBadVerb = -1,                 /*Bad verb passed to a routine*/
  234.     smBadScript = -2                /*Bad script code passed to a routine*/
  235. };
  236. enum {
  237.  
  238. /* Values for script redraw flag. */
  239.     smRedrawChar = 0,               /*Redraw character only*/
  240.     smRedrawWord = 1,               /*Redraw entire word (2-byte systems)*/
  241.     smRedrawLine = -1,              /*Redraw entire line (bidirectional systems)*/
  242.  
  243. /* GetEnvirons and SetEnvirons verbs */
  244.     smVersion = 0,                  /*Environment version number*/
  245.     smMunged = 2,                   /*Globals change count*/
  246.     smEnabled = 4,                  /*Environment enabled flag*/
  247.     smBidirect = 6,                 /*At least on bidirect script*/
  248.     smFontForce = 8,                /*Force font flag*/
  249.     smIntlForce = 10,               /*Force intl flag*/
  250.     smForced = 12,                  /*script forced to system script*/
  251.     smDefault = 14,                 /*script defaulted to Roman script*/
  252.     smPrint = 16,                   /*Printer action routine*/
  253.     smSysScript = 18,               /*System script*/
  254.     smLastScript = 20,              /*Last keyboard script*/
  255.     smKeyScript = 22,               /*Keyboard script*/
  256.     smSysRef = 24,                  /*System folder refNum*/
  257.     smKeyCache = 26,                /*Keyboard table cache pointer*/
  258.     smKeySwap = 28,                 /*Swapping table pointer*/
  259.     smGenFlags = 30,                /*General flags long*/
  260.     smOverride = 32                 /*Script override flags*/
  261. };
  262. enum {
  263.     smCharPortion = 34,             /*Ch vs SpExtra proportion*/
  264.  
  265. /* New for System 7.0: */
  266.     smDoubleByte = 36,              /*Flag for double-byte script installed*/
  267.     smKCHRCache = 38,               /*Returns pointer to KCHR cache*/
  268.     smRegionCode = 40,              /*Returns current region code (verXxx)*/
  269.  
  270. /* GetScript and SetScript verbs.
  271. Note: Verbs private to script systems are negative, while
  272. those general across script systems are non-negative. */
  273.     smScriptVersion = 0,            /*Script software version*/
  274.     smScriptMunged = 2,             /*Script entry changed count*/
  275.     smScriptEnabled = 4,            /*Script enabled flag*/
  276.     smScriptRight = 6,              /*Right to left flag*/
  277.     smScriptJust = 8,               /*Justification flag*/
  278.     smScriptRedraw = 10,            /*Word redraw flag*/
  279.     smScriptSysFond = 12,           /*Preferred system font*/
  280.     smScriptAppFond = 14,           /*Preferred Application font*/
  281.     smScriptBundle = 16,            /*Beginning of itlb verbs*/
  282.     smScriptNumber = 16,            /*Script itl0 id*/
  283.     smScriptDate = 18,              /*Script itl1 id*/
  284.     smScriptSort = 20,              /*Script itl2 id*/
  285.     smScriptFlags = 22,             /*flags word*/
  286.     smScriptToken = 24,             /*Script itl4 id*/
  287.     smScriptEncoding = 26,          /*id of optional itl5, if present*/
  288.     smScriptLang = 28               /*Current language for script*/
  289. };
  290. enum {
  291.     smScriptNumDate = 30,           /*Script KCHR id*/
  292.     smScriptKeys = 32,              /*Script KEYC id from dictionary*/
  293.     smScriptIcon = 34,              /*ID # of SICN or kcs#/kcs4/kcs8 suite*/
  294.     smScriptPrint = 36,             /*Script printer action routine*/
  295.     smScriptTrap = 38,              /*Trap entry pointer*/
  296.     smScriptCreator = 40,           /*Script file creator*/
  297.     smScriptFile = 42,              /*Script file name*/
  298.     smScriptName = 44,              /*Script name*/
  299.  
  300. /* There is a hole here for old Kanji private verbs 46-76 
  301.  
  302.  New for System 7.0: */
  303.     smScriptMonoFondSize = 78,      /*default monospace FOND (hi) & size (lo)*/
  304.     smScriptPrefFondSize = 80,      /*preferred FOND (hi) & size (lo)*/
  305.     smScriptSmallFondSize = 82,     /*default small FOND (hi) & size (lo)*/
  306.     smScriptSysFondSize = 84,       /*default system FOND (hi) & size (lo)*/
  307.     smScriptAppFondSize = 86,       /*default app FOND (hi) & size (lo)*/
  308.     smScriptHelpFondSize = 88,      /*default Help Mgr FOND (hi) & size (lo)*/
  309.     smScriptValidStyles = 90,       /*mask of valid styles for script*/
  310.     smScriptAliasStyle = 92,        /*style (set) to use for aliases*/
  311.  
  312. /* Negative verbs for KeyScript */
  313.     smKeyNextScript = -1,           /* Switch to next available script */
  314.     smKeySysScript = -2,            /* Switch to the system script */
  315.     smKeySwapScript = -3,           /* Switch to previously-used script */
  316.  
  317. /* New for System 7.0: */
  318.     smKeyNextKybd = -4              /* Switch to next keyboard in current script */
  319. };
  320. enum {
  321.     smKeySwapKybd = -5,             /* Switch to previously-used keyboard in current keyscript */
  322.  
  323.     smKeyDisableKybds = -6,         /* Disable keyboards not in system or Roman script */
  324.     smKeyEnableKybds = -7,          /* Re-enable keyboards for all enabled scripts */
  325.     smKeyToggleInline = -8,         /* Toggle inline input for current keyscript */
  326.     smKeyToggleDirection = -9,      /* Toggle default line direction (TESysJust) */
  327.     smKeyNextInputMethod = -10,     /* Switch to next input method in current keyscript */
  328.     smKeySwapInputMethod = -11,     /* Switch to last-used input method in current keyscript */
  329.  
  330.     smKeyDisableKybdSwitch = -12,   /* Disable switching from the current keyboard */
  331.  
  332.  
  333. /* Bits in the smScriptFlags word
  334. (bits above 7 are non-static) */
  335.     smsfIntellCP = 0,               /*script has intellegent cut & paste*/
  336.     smsfSingByte = 1,               /*script has only single bytes*/
  337.     smsfNatCase = 2,                /*native chars have upper & lower case*/
  338.     smsfContext = 3,                /*contextual script (e.g. AIS-based)*/
  339.     smsfNoForceFont = 4,            /*Will not force characters*/
  340.     smsfB0Digits = 5,               /*Has alternate digits at B0-B9*/
  341.     smsfAutoInit = 6,               /*auto initialize the script*/
  342.     smsfForms = 13,                 /*Uses contextual forms for letters*/
  343.     smsfLigatures = 14,             /*Uses contextual ligatures*/
  344.     smsfReverse = 15,               /*Reverses native text, right-left*/
  345.  
  346. /* Bits in the smGenFlags long.
  347. First (high-order) byte is set from itlc flags byte. */
  348.     smfShowIcon = 31,               /*Show icon even if only one script*/
  349.     smfDualCaret = 30               /*Use dual caret for mixed direction text*/
  350. };
  351. enum {
  352.     smfNameTagEnab = 29,            /*Reserved for internal use*/
  353.  
  354. /* Roman script constants 
  355.  
  356.  The following are here for backward compatibility, but should not be used. 
  357.  This information should be obtained using GetScript. */
  358.     romanSysFond = 0x3FFF,          /*system font id number*/
  359.     romanAppFond = 3,               /*application font id number*/
  360.     romanFlags = 0x0007,            /*roman settings*/
  361.  
  362. /* Script Manager font equates. */
  363.     smFondStart = 0x4000,           /*start from 16K*/
  364.     smFondEnd = 0xC000,             /*past end of range at 48K*/
  365.  
  366. /* Miscellaneous font equates. */
  367.     smUprHalfCharSet = 0x80,        /*first char code in top half of std char set*/
  368.  
  369. /* Character Set Extensions */
  370.     diaeresisUprY = 0xD9,
  371.     fraction = 0xDA,
  372.     intlCurrency = 0xDB,
  373.     leftSingGuillemet = 0xDC,
  374.     rightSingGuillemet = 0xDD,
  375.     fiLigature = 0xDE,
  376.     flLigature = 0xDF,
  377.     dblDagger = 0xE0,
  378.     centeredDot = 0xE1,
  379.     baseSingQuote = 0xE2,
  380.     baseDblQuote = 0xE3,
  381.     perThousand = 0xE4,
  382.     circumflexUprA = 0xE5
  383. };
  384. enum {
  385.     circumflexUprE = 0xE6,
  386.     acuteUprA = 0xE7,
  387.     diaeresisUprE = 0xE8,
  388.     graveUprE = 0xE9,
  389.     acuteUprI = 0xEA,
  390.     circumflexUprI = 0xEB,
  391.     diaeresisUprI = 0xEC,
  392.     graveUprI = 0xED,
  393.     acuteUprO = 0xEE,
  394.     circumflexUprO = 0xEF,
  395.     appleLogo = 0xF0,
  396.     graveUprO = 0xF1,
  397.     acuteUprU = 0xF2,
  398.     circumflexUprU = 0xF3,
  399.     graveUprU = 0xF4,
  400.     dotlessLwrI = 0xF5,
  401.     circumflex = 0xF6,
  402.     tilde = 0xF7,
  403.     macron = 0xF8,
  404.     breveMark = 0xF9
  405. };
  406. enum {
  407.     overDot = 0xFA,
  408.     ringMark = 0xFB,
  409.     cedilla = 0xFC,
  410.     doubleAcute = 0xFD,
  411.     ogonek = 0xFE,
  412.     hachek = 0xFF,
  413.  
  414. /* String2Date status values */
  415.     fatalDateTime = 0x8000,
  416.     longDateFound = 1,
  417.     leftOverChars = 2,
  418.     sepNotIntlSep = 4,
  419.     fieldOrderNotIntl = 8,
  420.     extraneousStrings = 16,
  421.     tooManySeps = 32,
  422.     sepNotConsistent = 64,
  423.     tokenErr = 0x8100,
  424.     cantReadUtilities = 0x8200,
  425.     dateTimeNotFound = 0x8400,
  426.     dateTimeInvalid = 0x8800,
  427.  
  428. /* TokenType values */
  429.     tokenIntl = 4,                  /*the itl resource number of the tokenizer*/
  430.     tokenEmpty = -1
  431. };
  432. enum {
  433.     tokenUnknown = 0,
  434.     tokenWhite = 1,
  435.     tokenLeftLit = 2,
  436.     tokenRightLit = 3,
  437.     tokenAlpha = 4,
  438.     tokenNumeric = 5,
  439.     tokenNewLine = 6,
  440.     tokenLeftComment = 7,
  441.     tokenRightComment = 8,
  442.     tokenLiteral = 9,
  443.     tokenEscape = 10,
  444.     tokenAltNum = 11,
  445.     tokenRealNum = 12,
  446.     tokenAltReal = 13,
  447.     tokenReserve1 = 14,
  448.     tokenReserve2 = 15,
  449.     tokenLeftParen = 16,
  450.     tokenRightParen = 17,
  451.     tokenLeftBracket = 18,
  452.     tokenRightBracket = 19
  453. };
  454. enum {
  455.     tokenLeftCurly = 20,
  456.     tokenRightCurly = 21,
  457.     tokenLeftEnclose = 22,
  458.     tokenRightEnclose = 23,
  459.     tokenPlus = 24,
  460.     tokenMinus = 25,
  461.     tokenAsterisk = 26,
  462.     tokenDivide = 27,
  463.     tokenPlusMinus = 28,
  464.     tokenSlash = 29,
  465.     tokenBackSlash = 30,
  466.     tokenLess = 31,
  467.     tokenGreat = 32,
  468.     tokenEqual = 33,
  469.     tokenLessEqual2 = 34,
  470.     tokenLessEqual1 = 35,
  471.     tokenGreatEqual2 = 36,
  472.     tokenGreatEqual1 = 37,
  473.     token2Equal = 38,
  474.     tokenColonEqual = 39
  475. };
  476. enum {
  477.     tokenNotEqual = 40,
  478.     tokenLessGreat = 41,
  479.     tokenExclamEqual = 42,
  480.     tokenExclam = 43,
  481.     tokenTilde = 44,
  482.     tokenComma = 45,
  483.     tokenPeriod = 46,
  484.     tokenLeft2Quote = 47,
  485.     tokenRight2Quote = 48,
  486.     tokenLeft1Quote = 49,
  487.     tokenRight1Quote = 50,
  488.     token2Quote = 51,
  489.     token1Quote = 52,
  490.     tokenSemicolon = 53,
  491.     tokenPercent = 54,
  492.     tokenCaret = 55,
  493.     tokenUnderline = 56,
  494.     tokenAmpersand = 57,
  495.     tokenAtSign = 58,
  496.     tokenBar = 59
  497. };
  498. enum {
  499.     tokenQuestion = 60,
  500.     tokenPi = 61,
  501.     tokenRoot = 62,
  502.     tokenSigma = 63,
  503.     tokenIntegral = 64,
  504.     tokenMicro = 65,
  505.     tokenCapPi = 66,
  506.     tokenInfinity = 67,
  507.     tokenColon = 68,
  508.     tokenHash = 69,
  509.     tokenDollar = 70,
  510.     tokenNoBreakSpace = 71,
  511.     tokenFraction = 72,
  512.     tokenIntlCurrency = 73,
  513.     tokenLeftSingGuillemet = 74,
  514.     tokenRightSingGuillemet = 75,
  515.     tokenPerThousand = 76,
  516.     tokenEllipsis = 77,
  517.     tokenCenterDot = 78,
  518.     tokenNil = 127
  519. };
  520. enum {
  521.     delimPad = -2,
  522.  
  523. /* obsolete, misspelled token names kept for backward compatibility */
  524.     tokenTilda = 44,
  525.     tokenCarat = 55,
  526.  
  527. /* the NumberParts indices */
  528.     tokLeftQuote = 1,
  529.     tokRightQuote = 2,
  530.     tokLeadPlacer = 3,
  531.     tokLeader = 4,
  532.     tokNonLeader = 5,
  533.     tokZeroLead = 6,
  534.     tokPercent = 7,
  535.     tokPlusSign = 8,
  536.     tokMinusSign = 9,
  537.     tokThousands = 10,
  538.     tokSeparator = 12,              /*11 is a reserved field*/
  539.     tokEscape = 13,
  540.     tokDecPoint = 14,
  541.     tokEPlus = 15,
  542.     tokEMinus = 16,
  543.     tokMaxSymbols = 31,
  544.     curNumberPartsVersion = 1       /*current version of NumberParts record*/
  545. };
  546. enum {
  547.     fVNumber = 0,                   /*first version of NumFormatString*/
  548.  
  549. /* Date equates */
  550.     smallDateBit = 31,              /*Restrict valid date/time to range of Time global*/
  551.     togChar12HourBit = 30,          /*If toggling hour by char, accept hours 1..12 only*/
  552.     togCharZCycleBit = 29,          /*Modifier for togChar12HourBit: accept hours 0..11 only*/
  553.     togDelta12HourBit = 28,         /*If toggling hour up/down, restrict to 12-hour range (am/pm)*/
  554.     genCdevRangeBit = 27,           /*Restrict date/time to range used by genl CDEV*/
  555.     validDateFields = -1,
  556.     maxDateField = 10,
  557.     eraMask = 0x0001,
  558.     yearMask = 0x0002,
  559.     monthMask = 0x0004,
  560.     dayMask = 0x0008,
  561.     hourMask = 0x0010,
  562.     minuteMask = 0x0020,
  563.     secondMask = 0x0040,
  564.     dayOfWeekMask = 0x0080,
  565.     dayOfYearMask = 0x0100,
  566.     weekOfYearMask = 0x0200,
  567.     pmMask = 0x0400,
  568.     dateStdMask = 0x007F
  569. };
  570. enum {
  571.  
  572. /* Toggle results */
  573.     toggleUndefined = 0,
  574.     toggleOK = 1,
  575.     toggleBadField = 2,
  576.     toggleBadDelta = 3,
  577.     toggleBadChar = 4,
  578.     toggleUnknown = 5,
  579.     toggleBadNum = 6,
  580.     toggleOutOfRange = 7,           /*synonym for toggleErr3*/
  581.     toggleErr3 = 7,
  582.     toggleErr4 = 8,
  583.     toggleErr5 = 9,
  584.  
  585. /* Constants for truncWhere argument in TruncString and TruncText */
  586.     smTruncEnd = 0,                 /* Truncate at end */
  587.     smTruncMiddle = 0x4000,         /* Truncate in middle */
  588.  
  589. /* Constants for TruncString and TruncText results */
  590.     smNotTruncated = 0,             /* No truncation was necessary */
  591.     smTruncated = 1,                /* Truncation performed */
  592.     smTruncErr = -1,                /* General error */
  593.  
  594. /*Constants for styleRunPosition argument in NPortionText, NDrawJust,
  595.  NMeasureJust, NChar2Pixel, and NPixel2Char.*/
  596.     smOnlyStyleRun = 0,             /* This is the only style run on the line*/
  597.     smLeftStyleRun = 1,             /* This is leftmost of multiple style runs on the line*/
  598.     smRightStyleRun = 2,            /* This is rightmost of multiple style runs on the line*/
  599.     smMiddleStyleRun = 3            /* There are multiple style runs on the line and this
  600.  is neither the leftmost nor the rightmost. */
  601. };
  602.  
  603.  
  604. enum {tokenOK,tokenOverflow,stringOverflow,badDelim,badEnding,crash};
  605. typedef unsigned char TokenResults;
  606.  
  607. enum {eraField,yearField,monthField,dayField,hourField,minuteField,secondField,
  608.     dayOfWeekField,dayOfYearField,weekOfYearField,pmField,res1Field,res2Field,
  609.     res3Field};
  610. typedef unsigned char LongDateField;
  611.  
  612. enum {smBreakWord,smBreakChar,smBreakOverflow};
  613. typedef unsigned char StyledLineBreakCode;
  614.  
  615. enum {fPositive,fNegative,fZero};
  616. typedef unsigned char FormatClass;
  617.  
  618. enum {fFormatOK,fBestGuess,fOutOfSynch,fSpuriousChars,fMissingDelimiter,
  619.     fExtraDecimal,fMissingLiteral,fExtraExp,fFormatOverflow,fFormStrIsNAN,
  620.     fBadPartsTable,fExtraPercent,fExtraSeparator,fEmptyFormatString};
  621. typedef unsigned char FormatResultType;
  622.  
  623.  
  624. typedef char CharByteTable[256];
  625. typedef short ToggleResults;
  626.  
  627. struct BreakTable {
  628.     char charTypes[256];
  629.     short tripleLength;
  630.     short triples[1];
  631. };
  632.  
  633. typedef struct BreakTable BreakTable;
  634. typedef BreakTable *BreakTablePtr;
  635.  
  636. /* New NBreakTable for System 7.0: */
  637. struct NBreakTable {
  638.     signed char flags1;
  639.     signed char flags2;
  640.     short version;
  641.     short classTableOff;
  642.     short auxCTableOff;
  643.     short backwdTableOff;
  644.     short forwdTableOff;
  645.     short doBackup;
  646.     short reserved;
  647.     char charTypes[256];
  648.     short tables[1];
  649. };
  650.  
  651. typedef struct NBreakTable NBreakTable;
  652. typedef NBreakTable *NBreakTablePtr;
  653.  
  654. struct OffPair {
  655.     short offFirst;
  656.     short offSecond;
  657. };
  658.  
  659. typedef struct OffPair OffPair;
  660.  
  661.  
  662. typedef OffPair OffsetTable[3];
  663.  
  664. struct ItlcRecord {
  665.     short itlcSystem;               /*default system script*/
  666.     short itlcReserved;             /*reserved*/
  667.     char itlcFontForce;             /*default font force flag*/
  668.     char itlcIntlForce;             /*default intl force flag*/
  669.     char itlcOldKybd;               /*old keyboard*/
  670.     char itlcFlags;                 /*general flags*/
  671.     short itlcIconOffset;           /*script icon offset*/
  672.     char itlcIconSide;              /*icon side*/
  673.     char itlcIconRsvd;              /*rsvd for other icon info*/
  674.     short itlcRegionCode;           /*preferred verXxx code*/
  675.     char itlcReserved3[34];         /*for future use*/
  676. };
  677.  
  678. typedef struct ItlcRecord ItlcRecord;
  679.  
  680. struct ItlbRecord {
  681.     short itlbNumber;               /*itl0 id number*/
  682.     short itlbDate;                 /*itl1 id number*/
  683.     short itlbSort;                 /*itl2 id number*/
  684.     short itlbFlags;                /*Script flags*/
  685.     short itlbToken;                /*itl4 id number*/
  686.     short itlbEncoding;             /*itl5 ID # (optional; char encoding)*/
  687.     short itlbLang;                 /*cur language for script */
  688.     char itlbNumRep;                /*number representation code*/
  689.     char itlbDateRep;               /*date representation code */
  690.     short itlbKeys;                 /*KCHR id number*/
  691.     short itlbIcon;                 /*ID # of SICN or kcs#/kcs4/kcs8 suite.*/
  692. };
  693.  
  694. typedef struct ItlbRecord ItlbRecord;
  695.  
  696. /* New ItlbExtRecord structure for System 7.0 */
  697. struct ItlbExtRecord {
  698.     ItlbRecord base;                /*un-extended ItlbRecord*/
  699.     long itlbLocalSize;             /*size of script's local record*/
  700.     short itlbMonoFond;             /*default monospace FOND ID*/
  701.     short itlbMonoSize;             /*default monospace font size*/
  702.     short itlbPrefFond;             /*preferred FOND ID*/
  703.     short itlbPrefSize;             /*preferred font size*/
  704.     short itlbSmallFond;            /*default small FOND ID*/
  705.     short itlbSmallSize;            /*default small font size*/
  706.     short itlbSysFond;              /*default system FOND ID*/
  707.     short itlbSysSize;              /*default system font size*/
  708.     short itlbAppFond;              /*default application FOND ID*/
  709.     short itlbAppSize;              /*default application font size*/
  710.     short itlbHelpFond;             /*default Help Mgr FOND ID*/
  711.     short itlbHelpSize;             /*default Help Mgr font size*/
  712.     Style itlbValidStyles;          /*set of valid styles for script*/
  713.     Style itlbAliasStyle;           /*style (set) to mark aliases*/
  714. };
  715.  
  716. typedef struct ItlbExtRecord ItlbExtRecord;
  717.  
  718. struct MachineLocation {
  719.     Fract latitude;
  720.     Fract longitude;
  721.     union{
  722.         char dlsDelta;              /*signed byte; daylight savings delta*/
  723.         long gmtDelta;              /*must mask - see documentation*/
  724.         }gmtFlags;
  725. };
  726.  
  727. typedef struct MachineLocation MachineLocation;
  728.  
  729.  
  730. typedef short String2DateStatus;
  731. typedef short TokenType;
  732. typedef TokenType DelimType[2];
  733. typedef TokenType CommentType[4];
  734.  
  735. struct TokenRec {
  736.     TokenType theToken;
  737.     Ptr position;                   /*pointer into original Source*/
  738.     long length;                    /*length of text in original source*/
  739.     StringPtr stringPosition;       /*Pascal/C string copy of identifier*/
  740. };
  741.  
  742. typedef struct TokenRec TokenRec;
  743. typedef TokenRec *TokenRecPtr;
  744.  
  745. struct TokenBlock {
  746.     Ptr source;                     /*pointer to stream of characters*/
  747.     long sourceLength;              /*length of source stream*/
  748.     Ptr tokenList;                  /*pointer to array of tokens*/
  749.     long tokenLength;               /*maximum length of TokenList*/
  750.     long tokenCount;                /*number tokens generated by tokenizer*/
  751.     Ptr stringList;                 /*pointer to stream of identifiers*/
  752.     long stringLength;              /*length of string list*/
  753.     long stringCount;               /*number of bytes currently used*/
  754.     Boolean doString;               /*make strings & put into StringLIst*/
  755.     Boolean doAppend;               /*append to TokenList rather than replace*/
  756.     Boolean doAlphanumeric;         /*identifiers may include numeric*/
  757.     Boolean doNest;                 /*do comments nest?*/
  758.     TokenType leftDelims[2];
  759.     TokenType rightDelims[2];
  760.     TokenType leftComment[4];
  761.     TokenType rightComment[4];
  762.     TokenType escapeCode;           /*escape symbol code*/
  763.     TokenType decimalCode;
  764.     Handle itlResource;             /*ptr to itl4 resource of current script*/
  765.     long reserved[8];               /*must be zero!*/
  766. };
  767.  
  768. typedef struct TokenBlock TokenBlock;
  769. typedef TokenBlock *TokenBlockPtr;
  770.  
  771. struct UntokenTable {
  772.     short len;
  773.     short lastToken;
  774.     short index[256];               /*index table; last = lastToken*/
  775. };
  776.  
  777. typedef struct UntokenTable UntokenTable;
  778. typedef UntokenTable *UntokenTablePtr, **UntokenTableHandle;
  779.  
  780. struct DateCacheRecord {
  781.     short hidden[256];              /*only for temporary use*/
  782. };
  783.  
  784. typedef struct DateCacheRecord DateCacheRecord;
  785. typedef DateCacheRecord *DateCachePtr;
  786.  
  787.  
  788. typedef comp LongDateTime;
  789.  
  790. union LongDateCvt {
  791.     comp c;
  792.     struct {
  793.         long lHigh;
  794.         long lLow;
  795.         } hl;
  796. };
  797.  
  798. typedef union LongDateCvt LongDateCvt;
  799.  
  800. union LongDateRec {
  801.     struct {
  802.         short era;
  803.         short year;
  804.         short month;
  805.         short day;
  806.         short hour;
  807.         short minute;
  808.         short second;
  809.         short dayOfWeek;
  810.         short dayOfYear;
  811.         short weekOfYear;
  812.         short pm;
  813.         short res1;
  814.         short res2;
  815.         short res3;
  816.         } ld;
  817.     short list[14];                 /*Index by LongDateField!*/
  818.     struct {
  819.         short eraAlt;
  820.         DateTimeRec oldDate;
  821.         } od;
  822. };
  823.  
  824. typedef union LongDateRec LongDateRec;
  825.  
  826.  
  827. typedef char DateDelta;
  828.  
  829. struct TogglePB {
  830.     long togFlags;                  /*caller normally sets low word to dateStdMask=$7F*/
  831.     ResType amChars;                /*from intl0*/
  832.     ResType pmChars;                /*from intl0*/
  833.     long reserved[4];
  834. };
  835.  
  836. typedef struct TogglePB TogglePB;
  837.  
  838.  
  839. typedef short FormatOrder[1];
  840. typedef FormatOrder *FormatOrderPtr;
  841. typedef short FormatStatus;
  842.  
  843. union WideChar {
  844.     char a[2];                      /*0 is the high order character*/
  845.     short b;
  846. };
  847.  
  848. typedef union WideChar WideChar;
  849.  
  850. struct WideCharArr {
  851.     short size;
  852.     WideChar data[10];
  853. };
  854.  
  855. typedef struct WideCharArr WideCharArr;
  856.  
  857. struct NumFormatString {
  858.     char fLength;
  859.     char fVersion;
  860.     char data[254];                 /*private data*/
  861. };
  862.  
  863. typedef struct NumFormatString NumFormatString;
  864.  
  865. struct Itl4Rec {
  866.     short flags;
  867.     long resourceType;
  868.     short resourceNum;
  869.     short version;
  870.     long resHeader1;
  871.     long resHeader2;
  872.     short numTables;                /*one-based*/
  873.     long mapOffset;                 /*offsets are from record start*/
  874.     long strOffset;
  875.     long fetchOffset;
  876.     long unTokenOffset;
  877.     long defPartsOffset;
  878.     long resOffset6;
  879.     long resOffset7;
  880.     long resOffset8;
  881. };
  882.  
  883. typedef struct Itl4Rec Itl4Rec;
  884. typedef Itl4Rec *Itl4Ptr, **Itl4Handle;
  885.  
  886. /* New NItl4Rec for System 7.0: */
  887. struct NItl4Rec {
  888.     short flags;
  889.     long resourceType;
  890.     short resourceNum;
  891.     short version;
  892.     short format;
  893.     short resHeader;
  894.     long resHeader2;
  895.     short numTables;                /*one-based*/
  896.     long mapOffset;                 /*offsets are from record start*/
  897.     long strOffset;
  898.     long fetchOffset;
  899.     long unTokenOffset;
  900.     long defPartsOffset;
  901.     long whtSpListOffset;
  902.     long resOffset7;
  903.     long resOffset8;
  904.     short resLength1;
  905.     short resLength2;
  906.     short resLength3;
  907.     short unTokenLength;
  908.     short defPartsLength;
  909.     short whtSpListLength;
  910.     short resLength7;
  911.     short resLength8;
  912. };
  913.  
  914. typedef struct NItl4Rec NItl4Rec;
  915. typedef NItl4Rec *NItl4Ptr, **NItl4Handle;
  916.  
  917. struct NumberParts {
  918.     short version;
  919.     WideChar data[31];              /*index by [tokLeftQuote..tokMaxSymbols]*/
  920.     WideCharArr pePlus;
  921.     WideCharArr peMinus;
  922.     WideCharArr peMinusPlus;
  923.     WideCharArr altNumTable;
  924.     char reserved[20];
  925. };
  926.  
  927. typedef struct NumberParts NumberParts;
  928. typedef NumberParts *NumberPartsPtr;
  929.  
  930. struct FVector {
  931.     short start;
  932.     short length;
  933. };
  934.  
  935. typedef struct FVector FVector;
  936.  
  937.  
  938. typedef FVector TripleInt[3];       /* index by [fPositive..fZero] */
  939.  
  940. struct ScriptRunStatus {
  941.     char script;
  942.     char variant;
  943. };
  944.  
  945. typedef struct ScriptRunStatus ScriptRunStatus;
  946.  
  947.  
  948. /* type for truncWhere parameter in new TruncString, TruncText */
  949. typedef short TruncCode;
  950.  
  951. /* type for styleRunPosition parameter in NPixel2Char etc. */
  952. typedef short JustStyleCode;
  953.  
  954. #ifdef __cplusplus
  955. extern "C" {
  956. #endif
  957. pascal short FontScript(void)
  958.     = {0x2F3C,0x8200,0x0000,0xA8B5}; 
  959. pascal short IntlScript(void)
  960.     = {0x2F3C,0x8200,0x0002,0xA8B5}; 
  961. pascal void KeyScript(short code)
  962.     = {0x2F3C,0x8002,0x0004,0xA8B5}; 
  963. pascal short Font2Script(short fontNumber)
  964.     = {0x2F3C,0x8202,0x0006,0xA8B5}; 
  965. pascal long GetEnvirons(short verb)
  966.     = {0x2F3C,0x8402,0x0008,0xA8B5}; 
  967. pascal OSErr SetEnvirons(short verb,long param)
  968.     = {0x2F3C,0x8206,0x000A,0xA8B5}; 
  969. pascal long GetScript(short script,short verb)
  970.     = {0x2F3C,0x8404,0x000C,0xA8B5}; 
  971. pascal OSErr SetScript(short script,short verb,long param)
  972.     = {0x2F3C,0x8208,0x000E,0xA8B5}; 
  973. pascal short CharByte(Ptr textBuf,short textOffset)
  974.     = {0x2F3C,0x8206,0x0010,0xA8B5}; 
  975. pascal short CharType(Ptr textBuf,short textOffset)
  976.     = {0x2F3C,0x8206,0x0012,0xA8B5}; 
  977. pascal short Pixel2Char(Ptr textBuf,short textLen,short slop,short pixelWidth,
  978.     Boolean *leadingEdge)
  979.     = {0x2F3C,0x820E,0x0014,0xA8B5}; 
  980. pascal short Char2Pixel(Ptr textBuf,short textLen,short slop,short offset,
  981.     short direction)
  982.     = {0x2F3C,0x820C,0x0016,0xA8B5}; 
  983. pascal OSErr Transliterate(Handle srcHandle,Handle dstHandle,short target,
  984.     long srcMask)
  985.     = {0x2F3C,0x820E,0x0018,0xA8B5}; 
  986. pascal void FindWord(Ptr textPtr,short textLength,short offset,Boolean leadingEdge,
  987.     BreakTablePtr breaks,OffsetTable offsets)
  988.     = {0x2F3C,0x8012,0x001A,0xA8B5}; 
  989. pascal void HiliteText(Ptr textPtr,short textLength,short firstOffset,short secondOffset,
  990.     OffsetTable offsets)
  991.     = {0x2F3C,0x800E,0x001C,0xA8B5}; 
  992. pascal void DrawJust(Ptr textPtr,short textLength,short slop)
  993.     = {0x2F3C,0x8008,0x001E,0xA8B5}; 
  994. pascal void MeasureJust(Ptr textPtr,short textLength,short slop,Ptr charLocs)
  995.     = {0x2F3C,0x800C,0x0020,0xA8B5}; 
  996. pascal Boolean ParseTable(CharByteTable table)
  997.     = {0x2F3C,0x8204,0x0022,0xA8B5}; 
  998. pascal short GetDefFontSize(void)
  999.     = {0x3EB8,0x0BA8,0x6604,0x3EBC,0x000C}; 
  1000. #define GetSysFont() (* (short*) 0x0BA6)
  1001. #define GetAppFont() (* (short*) 0x0984)
  1002. #define GetMBarHeight() (* (short*) 0x0BAA)
  1003. #define GetSysJust() (* (short*) 0x0BAC)
  1004. pascal void SetSysJust(short newJust)
  1005.     = {0x31DF,0x0BAC}; 
  1006. pascal void ReadLocation(MachineLocation *loc)
  1007.     = {0x205F,0x203C,0x000C,0x00E4,0xA051}; 
  1008. pascal void WriteLocation(const MachineLocation *loc)
  1009.     = {0x205F,0x203C,0x000C,0x00E4,0xA052}; 
  1010. pascal void UprText(Ptr textPtr,short len)
  1011.     = {0x301F,0x205F,0xA054}; 
  1012. pascal void LwrText(Ptr textPtr,short len)
  1013.     = {0x301F,0x205F,0xA056}; 
  1014.  
  1015. /*  New for 7.0  */
  1016. pascal void LowerText(Ptr textPtr,short len)
  1017.     = {0x301F,0x205F,0xA056}; 
  1018. pascal void StripText(Ptr textPtr,short len)
  1019.     = {0x301F,0x205F,0xA256}; 
  1020. pascal void UpperText(Ptr textPtr,short len)
  1021.     = {0x301F,0x205F,0xA456}; 
  1022. pascal void StripUpperText(Ptr textPtr,short len)
  1023.     = {0x301F,0x205F,0xA656}; 
  1024.  
  1025. pascal StyledLineBreakCode StyledLineBreak(Ptr textPtr,long textLen,long textStart,
  1026.     long textEnd,long flags,Fixed *textWidth,long *textOffset)
  1027.     = {0x2F3C,0x821C,0xFFFE,0xA8B5}; 
  1028. pascal void GetFormatOrder(FormatOrderPtr ordering,short firstFormat,short lastFormat,
  1029.     Boolean lineRight,Ptr rlDirProc,Ptr dirParam)
  1030.     = {0x2F3C,0x8012,0xFFFC,0xA8B5}; 
  1031. pascal TokenResults IntlTokenize(TokenBlockPtr tokenParam)
  1032.     = {0x2F3C,0x8204,0xFFFA,0xA8B5}; 
  1033. pascal OSErr InitDateCache(DateCachePtr theCache)
  1034.     = {0x2F3C,0x8204,0xFFF8,0xA8B5}; 
  1035. pascal String2DateStatus String2Date(Ptr textPtr,long textLen,DateCachePtr theCache,
  1036.     long *lengthUsed,LongDateRec *dateTime)
  1037.     = {0x2F3C,0x8214,0xFFF6,0xA8B5}; 
  1038. pascal String2DateStatus String2Time(Ptr textPtr,long textLen,DateCachePtr theCache,
  1039.     long *lengthUsed,LongDateRec *dateTime)
  1040.     = {0x2F3C,0x8214,0xFFF4,0xA8B5}; 
  1041. pascal void LongDate2Secs(const LongDateRec *lDate,LongDateTime *lSecs)
  1042.     = {0x2F3C,0x8008,0xFFF2,0xA8B5}; 
  1043. pascal void LongSecs2Date(LongDateTime *lSecs,LongDateRec *lDate)
  1044.     = {0x2F3C,0x8008,0xFFF0,0xA8B5}; 
  1045. pascal ToggleResults ToggleDate(LongDateTime *lSecs,LongDateField field,
  1046.     DateDelta delta,short ch,const TogglePB *params)
  1047.     = {0x2F3C,0x820E,0xFFEE,0xA8B5}; 
  1048. pascal FormatStatus Str2Format(ConstStr255Param inString,const NumberParts *partsTable,
  1049.     NumFormatString *outString)
  1050.     = {0x2F3C,0x820C,0xFFEC,0xA8B5}; 
  1051. pascal FormatStatus Format2Str(const NumFormatString *myCanonical,const NumberParts *partsTable,
  1052.     Str255 outString,TripleInt *positions)
  1053.     = {0x2F3C,0x8210,0xFFEA,0xA8B5}; 
  1054. pascal FormatStatus FormatX2Str(extended x,const NumFormatString *myCanonical,
  1055.     const NumberParts *partsTable,Str255 outString)
  1056.     = {0x2F3C,0x8210,0xFFE8,0xA8B5}; 
  1057. pascal FormatStatus FormatStr2X(ConstStr255Param source,const NumFormatString *myCanonical,
  1058.     const NumberParts *partsTable,extended *x)
  1059.     = {0x2F3C,0x8210,0xFFE6,0xA8B5}; 
  1060. pascal Fixed PortionText(Ptr textPtr,long textLen)
  1061.     = {0x2F3C,0x8408,0x0024,0xA8B5}; 
  1062. pascal ScriptRunStatus FindScriptRun(Ptr textPtr,long textLen,long *lenUsed)
  1063.     = {0x2F3C,0x820C,0x0026,0xA8B5}; 
  1064. pascal long VisibleLength(Ptr textPtr,long textLen)
  1065.     = {0x2F3C,0x8408,0x0028,0xA8B5}; 
  1066. pascal short ValidDate(LongDateRec *vDate,long flags,LongDateTime *newSecs)
  1067.     = {0x2F3C,0x8204,0xFFE4,0xA8B5}; 
  1068.  
  1069. /*  New for 7.0  */
  1070. pascal void NFindWord(Ptr textPtr,short textLength,short offset,Boolean leadingEdge,
  1071.     NBreakTablePtr nbreaks,OffsetTable offsets)
  1072.     = {0x2F3C,0x8012,0xFFE2,0xA8B5}; 
  1073. pascal short TruncString(short width,Str255 theString,TruncCode truncWhere)
  1074.     = {0x2F3C,0x8208,0xFFE0,0xA8B5}; 
  1075. pascal short TruncText(short width,Ptr textPtr,short *length,TruncCode truncWhere)
  1076.     = {0x2F3C,0x820C,0xFFDE,0xA8B5}; 
  1077. pascal short ReplaceText(Handle baseText,Handle substitutionText,Str15 key)
  1078.     = {0x2F3C,0x820C,0xFFDC,0xA8B5}; 
  1079. pascal short NPixel2Char(Ptr textBuf,long textLen,Fixed slop,Fixed pixelWidth,
  1080.     Boolean *leadingEdge,Fixed *widthRemaining,JustStyleCode styleRunPosition,
  1081.     Point numer,Point denom)
  1082.     = {0x2F3C,0x8222,0x002E,0xA8B5}; 
  1083. pascal short NChar2Pixel(Ptr textBuf,long textLen,Fixed slop,long offset,
  1084.     short direction,JustStyleCode styleRunPosition,Point numer,Point denom)
  1085.     = {0x2F3C,0x821C,0x0030,0xA8B5}; 
  1086. pascal void NDrawJust(Ptr textPtr,long textLength,Fixed slop,JustStyleCode styleRunPosition,
  1087.     Point numer,Point denom)
  1088.     = {0x2F3C,0x8016,0x0032,0xA8B5}; 
  1089. pascal void NMeasureJust(Ptr textPtr,long textLength,Fixed slop,Ptr charLocs,
  1090.     JustStyleCode styleRunPosition,Point numer,Point denom)
  1091.     = {0x2F3C,0x801A,0x0034,0xA8B5}; 
  1092. pascal Fixed NPortionText(Ptr textPtr,long textLen,JustStyleCode styleRunPosition,
  1093.     Point numer,Point denom)
  1094.     = {0x2F3C,0x8412,0x0036,0xA8B5}; 
  1095. #ifdef __cplusplus
  1096. }
  1097. #endif
  1098.  
  1099. #endif
  1100.